#extraida do TR8
tr8 <- read.csv("traits_tr8.csv", h=T, ",") library(rmarkdown) paged_table(tr8)
#extraida direto do TRY
try <- read.csv("extraidos_direto_try.csv", h=T, ";") paged_table(try)